home *** CD-ROM | disk | FTP | other *** search
/ Aminet 32 / Aminet 32 (1999)(Schatztruhe)[!][Aug 1999].iso / GoldED / Add-Ons / envRCS09 / Install < prev    next >
Text File  |  1999-07-06  |  5KB  |  168 lines
  1. ; $VER: 1.0 All rights reserved.
  2.  
  3. (delopts "oknodelete" "force" "askuser")
  4. (complete 0)
  5.  
  6. (if (exists "GOLDED:" (NOREQ))
  7.  
  8.     (
  9.         (set vernum (getversion "golded:golded"))
  10.  
  11.         (set ver (/ vernum 65536))
  12.         (set rev (- vernum (* ver 65536)))
  13.  
  14.         (set version (+ (* 10 ver) rev))
  15.  
  16.         (if (< version 47)
  17.  
  18.             (
  19.                 (message "\nSorry, GoldED 4.7.0 or better required")
  20.  
  21.                 (exit (quiet))
  22.             )
  23.         )
  24.  
  25.         (message (cat "\n"
  26.  
  27.             "                                            \n"
  28.             "RCS for GoldED (experimental beta)          \n"
  29.             "                                            \n"
  30.             "©1997 Dietmar Eilert                        \n"
  31.             "      All Rights Reserved.                  \n"
  32.             "                                            \n"
  33.             "      E-Mail: dietmar@tomate.tng.oche.de    \n"
  34.             "                                            \n"
  35.             "GoldED Release 4.7.0+ required.             \n"
  36.         ))
  37.  
  38.         (if (and (exists "rcs:" (noreq)) (exists "rcs:ci" (noreq)) (exists "rcs:co" (noreq)) (exists "rcs:rcs" (noreq)) (exists "rcs:rlog" (noreq)) (exists "rcs:setuprcs" (noreq)))
  39.  
  40.             (
  41.                 (if (not (exists "golded:api"))
  42.  
  43.                     (makedir "golded:api")
  44.                 )
  45.  
  46.                 (if (not (exists "golded:syntax"))
  47.  
  48.                     (makedir "golded:syntax")
  49.                 )
  50.  
  51.                 ; install registry editor (if not yet installed)
  52.  
  53.                 (if (not (exists "golded:tools"))
  54.  
  55.                     (makedir "golded:tools")
  56.                 )
  57.  
  58.                 (if (not (exists "golded:tools/regedit"))
  59.  
  60.                     (makedir "golded:tools/regedit")
  61.                 )
  62.  
  63.                 (copylib
  64.  
  65.                     (prompt "Install registry editor ?")
  66.                     (source "bin/regedit" )
  67.                     (dest   "golded:tools/regedit")
  68.                     (confirm)
  69.                     (help @copylib-help)
  70.                 )
  71.  
  72.                 ; install basic files
  73.  
  74.                 (if (not (exists "golded:tools/rcs"))
  75.  
  76.                     (makedir "golded:tools/rcs")
  77.                 )
  78.  
  79.                 (copyfiles
  80.  
  81.                     (source "rcs")
  82.                     (dest   "golded:tools/rcs")
  83.                     (all)
  84.                 )
  85.  
  86.                 ; install toolbar images
  87.  
  88.                 (if (exists "toolbar") (
  89.  
  90.                     (set hicolor
  91.  
  92.                         (askchoice
  93.  
  94.                             (prompt "\nSelect toolbar style:\n")
  95.  
  96.                             (choices
  97.  
  98.                                 "4  colors"
  99.                                 "8+ colors"
  100.                             )
  101.  
  102.                             (default 1)
  103.  
  104.                             (help (cat "\n"
  105.  
  106.                                 " You can use both styles on all screens. The 4\n"
  107.                                 " color style has been optimized for 4-color   \n"
  108.                                 " screens. The 8+ style has been optimized for \n"
  109.                                 " screens with eight or more colors.           \n"
  110.                             ))
  111.                         )
  112.                     )
  113.  
  114.                     (if (not (exists "golded:toolbar"))
  115.  
  116.                         (makedir "golded:toolbar")
  117.                     )
  118.  
  119.                     (if (not (exists "golded:toolbar/rcs"))
  120.  
  121.                         (makedir "golded:toolbar/rcs")
  122.                     )
  123.  
  124.                     (copyfiles
  125.  
  126.                         (source "toolbar")
  127.                         (dest   "golded:toolbar")
  128.                         (all)
  129.                     )
  130.  
  131.                     (if (= hicolor 1)
  132.  
  133.                         (copyfiles
  134.  
  135.                             (source "toolbar16")
  136.                             (dest   "golded:toolbar")
  137.                             (nogauge)
  138.                             (all)
  139.                         )
  140.                     )
  141.                 ))
  142.  
  143.                 ; update registry
  144.  
  145.                 (working "Updating registry...")
  146.  
  147.                 (run "golded:tools/regedit/regedit script=install.bat")
  148.             )
  149.  
  150.             (message (cat "\n"
  151.  
  152.                 "HWRCS required. Please install HWRCS before\n"
  153.                 "you proceed.                               \n"
  154.             ))
  155.         )
  156.     )
  157.  
  158.     (message (cat "\n"
  159.  
  160.         "Please install GoldED before attempting to\n"
  161.         "install this client.                      \n"
  162.     ))
  163. )
  164.  
  165. (exit (quiet))
  166.  
  167. (welcome)
  168.